3.2555 \(\int \frac{(a+b x^n)^5}{x} \, dx\)

Optimal. Leaf size=84 \[ \frac{5 a^3 b^2 x^{2 n}}{n}+\frac{10 a^2 b^3 x^{3 n}}{3 n}+\frac{5 a^4 b x^n}{n}+a^5 \log (x)+\frac{5 a b^4 x^{4 n}}{4 n}+\frac{b^5 x^{5 n}}{5 n} \]

[Out]

(5*a^4*b*x^n)/n + (5*a^3*b^2*x^(2*n))/n + (10*a^2*b^3*x^(3*n))/(3*n) + (5*a*b^4*x^(4*n))/(4*n) + (b^5*x^(5*n))
/(5*n) + a^5*Log[x]

________________________________________________________________________________________

Rubi [A]  time = 0.0352064, antiderivative size = 84, normalized size of antiderivative = 1., number of steps used = 3, number of rules used = 2, integrand size = 13, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.154, Rules used = {266, 43} \[ \frac{5 a^3 b^2 x^{2 n}}{n}+\frac{10 a^2 b^3 x^{3 n}}{3 n}+\frac{5 a^4 b x^n}{n}+a^5 \log (x)+\frac{5 a b^4 x^{4 n}}{4 n}+\frac{b^5 x^{5 n}}{5 n} \]

Antiderivative was successfully verified.

[In]

Int[(a + b*x^n)^5/x,x]

[Out]

(5*a^4*b*x^n)/n + (5*a^3*b^2*x^(2*n))/n + (10*a^2*b^3*x^(3*n))/(3*n) + (5*a*b^4*x^(4*n))/(4*n) + (b^5*x^(5*n))
/(5*n) + a^5*Log[x]

Rule 266

Int[(x_)^(m_.)*((a_) + (b_.)*(x_)^(n_))^(p_), x_Symbol] :> Dist[1/n, Subst[Int[x^(Simplify[(m + 1)/n] - 1)*(a
+ b*x)^p, x], x, x^n], x] /; FreeQ[{a, b, m, n, p}, x] && IntegerQ[Simplify[(m + 1)/n]]

Rule 43

Int[((a_.) + (b_.)*(x_))^(m_.)*((c_.) + (d_.)*(x_))^(n_.), x_Symbol] :> Int[ExpandIntegrand[(a + b*x)^m*(c + d
*x)^n, x], x] /; FreeQ[{a, b, c, d, n}, x] && NeQ[b*c - a*d, 0] && IGtQ[m, 0] && ( !IntegerQ[n] || (EqQ[c, 0]
&& LeQ[7*m + 4*n + 4, 0]) || LtQ[9*m + 5*(n + 1), 0] || GtQ[m + n + 2, 0])

Rubi steps

\begin{align*} \int \frac{\left (a+b x^n\right )^5}{x} \, dx &=\frac{\operatorname{Subst}\left (\int \frac{(a+b x)^5}{x} \, dx,x,x^n\right )}{n}\\ &=\frac{\operatorname{Subst}\left (\int \left (5 a^4 b+\frac{a^5}{x}+10 a^3 b^2 x+10 a^2 b^3 x^2+5 a b^4 x^3+b^5 x^4\right ) \, dx,x,x^n\right )}{n}\\ &=\frac{5 a^4 b x^n}{n}+\frac{5 a^3 b^2 x^{2 n}}{n}+\frac{10 a^2 b^3 x^{3 n}}{3 n}+\frac{5 a b^4 x^{4 n}}{4 n}+\frac{b^5 x^{5 n}}{5 n}+a^5 \log (x)\\ \end{align*}

Mathematica [A]  time = 0.0391113, size = 74, normalized size = 0.88 \[ \frac{5 a^3 b^2 x^{2 n}+\frac{10}{3} a^2 b^3 x^{3 n}+5 a^4 b x^n+a^5 n \log (x)+\frac{5}{4} a b^4 x^{4 n}+\frac{1}{5} b^5 x^{5 n}}{n} \]

Antiderivative was successfully verified.

[In]

Integrate[(a + b*x^n)^5/x,x]

[Out]

(5*a^4*b*x^n + 5*a^3*b^2*x^(2*n) + (10*a^2*b^3*x^(3*n))/3 + (5*a*b^4*x^(4*n))/4 + (b^5*x^(5*n))/5 + a^5*n*Log[
x])/n

________________________________________________________________________________________

Maple [A]  time = 0.004, size = 84, normalized size = 1. \begin{align*}{\frac{{b}^{5} \left ({x}^{n} \right ) ^{5}}{5\,n}}+{\frac{5\,a{b}^{4} \left ({x}^{n} \right ) ^{4}}{4\,n}}+{\frac{10\,{a}^{2}{b}^{3} \left ({x}^{n} \right ) ^{3}}{3\,n}}+5\,{\frac{{a}^{3}{b}^{2} \left ({x}^{n} \right ) ^{2}}{n}}+5\,{\frac{{a}^{4}b{x}^{n}}{n}}+{\frac{{a}^{5}\ln \left ({x}^{n} \right ) }{n}} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((a+b*x^n)^5/x,x)

[Out]

1/5/n*b^5*(x^n)^5+5/4/n*a*b^4*(x^n)^4+10/3/n*a^2*b^3*(x^n)^3+5/n*a^3*b^2*(x^n)^2+5*a^4*b*x^n/n+1/n*a^5*ln(x^n)

________________________________________________________________________________________

Maxima [A]  time = 0.98316, size = 100, normalized size = 1.19 \begin{align*} \frac{a^{5} \log \left (x^{n}\right )}{n} + \frac{12 \, b^{5} x^{5 \, n} + 75 \, a b^{4} x^{4 \, n} + 200 \, a^{2} b^{3} x^{3 \, n} + 300 \, a^{3} b^{2} x^{2 \, n} + 300 \, a^{4} b x^{n}}{60 \, n} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*x^n)^5/x,x, algorithm="maxima")

[Out]

a^5*log(x^n)/n + 1/60*(12*b^5*x^(5*n) + 75*a*b^4*x^(4*n) + 200*a^2*b^3*x^(3*n) + 300*a^3*b^2*x^(2*n) + 300*a^4
*b*x^n)/n

________________________________________________________________________________________

Fricas [A]  time = 1.28355, size = 165, normalized size = 1.96 \begin{align*} \frac{60 \, a^{5} n \log \left (x\right ) + 12 \, b^{5} x^{5 \, n} + 75 \, a b^{4} x^{4 \, n} + 200 \, a^{2} b^{3} x^{3 \, n} + 300 \, a^{3} b^{2} x^{2 \, n} + 300 \, a^{4} b x^{n}}{60 \, n} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*x^n)^5/x,x, algorithm="fricas")

[Out]

1/60*(60*a^5*n*log(x) + 12*b^5*x^(5*n) + 75*a*b^4*x^(4*n) + 200*a^2*b^3*x^(3*n) + 300*a^3*b^2*x^(2*n) + 300*a^
4*b*x^n)/n

________________________________________________________________________________________

Sympy [A]  time = 0.778728, size = 85, normalized size = 1.01 \begin{align*} \begin{cases} a^{5} \log{\left (x \right )} + \frac{5 a^{4} b x^{n}}{n} + \frac{5 a^{3} b^{2} x^{2 n}}{n} + \frac{10 a^{2} b^{3} x^{3 n}}{3 n} + \frac{5 a b^{4} x^{4 n}}{4 n} + \frac{b^{5} x^{5 n}}{5 n} & \text{for}\: n \neq 0 \\\left (a + b\right )^{5} \log{\left (x \right )} & \text{otherwise} \end{cases} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*x**n)**5/x,x)

[Out]

Piecewise((a**5*log(x) + 5*a**4*b*x**n/n + 5*a**3*b**2*x**(2*n)/n + 10*a**2*b**3*x**(3*n)/(3*n) + 5*a*b**4*x**
(4*n)/(4*n) + b**5*x**(5*n)/(5*n), Ne(n, 0)), ((a + b)**5*log(x), True))

________________________________________________________________________________________

Giac [F]  time = 0., size = 0, normalized size = 0. \begin{align*} \int \frac{{\left (b x^{n} + a\right )}^{5}}{x}\,{d x} \end{align*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((a+b*x^n)^5/x,x, algorithm="giac")

[Out]

integrate((b*x^n + a)^5/x, x)